From: Kenichi Handa <handa@m17n.org>
Date: Tue, 7 Jul 2009 06:27:53 +0000 (+0000)
Subject: (reset-language-environment): Put
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~324^2~11633
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=af4100ead57fb0c8d5762e73f75765f3c36dc658;p=emacs.git

(reset-language-environment): Put
the highset priority to the charset iso-8859-1.
---

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index 34d4fb3830d..e67c8ea5e5c 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -1795,6 +1795,12 @@ The default status is as follows:
     (setq default-process-coding-system
 	  (cons output-coding input-coding)))
 
+  ;; Put the highest priority to the charset iso-8859-1 to prefer the
+  ;; registry iso8859-1 over iso8859-2 in font selection.  It also
+  ;; makes unibyte-display-via-language-environment to use iso-8859-1
+  ;; as the unibyte charset.
+  (set-charset-priority 'iso-8859-1)
+
   ;; Don't alter the terminal and keyboard coding systems here.
   ;; The terminal still supports the same coding system
   ;; that it supported a minute ago.